Top 10k strings from Hustler Plays Pool, The (1983)(Omega Software).tap in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Games / [TAP] /
Back to the directory listing
6 e6)="00000" 6 e11)="00000" 5 f,e4;z$(e1 4 h$="000000000000" 4 3 m$="000000000000" 3 e19,e4;"Press any key to continue" 3 e11)="0000000000" 3 col=c(e1): 3 c$="000000000000" 2 x(e1)=22794 2 shots=shots-e1 2 shots=shots+e1 2 n(c)=n(c)+e1: 2 h 2 f,e16;z$(e1 2 f,e0;b$(c,f+e1): 2 e9;" Do you want instructions? ": 2 e9;" Press key Y or N ": 2 e7,e4;" The object of the game"; 2 e6,e4;"The White is Cue ball." 2 e5,e4;"5 Yellow,1 Black,1 White."; 2 e4,e4;"a set of 12 balls. 5 Blue"; 2 e3,e4;" The game is played with"; 2 e19,e4;"Press any key to continue" 2 e18,e6;z$(e1 2 e0;" ": 2 ;"is LOADING" 2 ;"THE HUSTLER" 2 ;"-----------" 2 ;" PLEASE LEAVE TAPE RUNNING ";" WHILE I COMPLETE LOADING": 1 zz=(x(e1)-(zz*256 1 zz;" program" 1 z$=" " 1 x(e9)=22906 1 x(e8)=22838 1 x(e7)=22774 1 x(e6)=22744 1 x(e5)=22778 1 x(e4)=22842 1 x(e3)=22872 1 x(e2)=22804 1 x(e12)=22808 1 x(e11)=22714 1 x(e10)=22812 1 x(e1)=22826 1 x(e1)=22825 1 x(e1)=22824 1 x(e1)=22793 1 x(e1)=22792 1 x(e1)=22762 1 x(e1)=22761 1 x(e1)=22760 1 x(e1)=(22528 1 spin=spin+e1: 1 shots=shots+sk1 1 score=score+50 1 score=score+(8 1 score=score+(4 1 score=score+(2 1 r(e2)=r(e1) 1 pool 1 p$="111111111111" 1 p$(e1)="1": 1 p$(e1)="0" 1 p 1 n(e2)=n(e2)+e1: 1 n(e2)=n(e2)+e1 1 n(e1)=n(e1)+e1: 1 n(e1)=n(e1)+e1 1 n(c)=n(c)-e1 1 n(c)=n(c)+e1 1 f-e1,e0;A$(f): 1 f-e1,e0;" ": 1 f,e3;z$(e1 1 f,e3;" ": 1 f,e0;b$(e3,f+e1): 1 e9;" Please CHOOSE GAME by ": 1 e9;" Pressing key 1 or 2 ": 1 e9,e4;"shot if ball is potted."; 1 e9,e4;"of one colour (Yellow or"; 1 e9,e4;"given on each option and"; 1 e9,e4;"either a lack of chalk or"; 1 e9,e4;"any colour may be potted"; 1 e9,e4;"and blue balls before the"; 1 e9,e4;" first. "; 1 e8,e4;"will be BLACK to indicate"; 1 e8,e4;"whether miscue was due to"; 1 e8,e4;"shots(skill level),gain a"; 1 e8,e4;"is to pot all the yellow"; 1 e8,e4;"is to pot all the balls"; 1 e8,e4;" Hitting the wrong colour"; 1 e8,e4;" Full instructions are"; 1 e7;"HI=";HIS; 1 e7,e4;"determined the background"; 1 e7,e4;" SPIN ( 9 choices)" 1 e7,e4;" Not hitting a ball. "; 1 e7,e4;" You start with 5 to 45"; 1 e7,e4;" The referee will decide"; 1 e6,e4;"miscue on long shots." 1 e6,e4;" STRENGTH (54 choices)"; 1 e6,e4;" Potting White ball."; 1 e6,e4;" Until the colours are"; 1 e6,e4;" x 8 Black ball." 1 e5,e4;"so there is a tendence to"; 1 e5,e4;"player's colour." 1 e5,e4;"any fouls. Fouls are:-"; 1 e5,e4;" DIRECTION (16 choices)"; 1 e5,e4;" x 4 Yellow ball"; 1 e4,e4;"to the other player for"; 1 e4,e4;"the pocket x 2 Blue ball"; 1 e4,e4;"is used to indicate the"; 1 e4,e4;"indicate the following;-"; 1 e4,e4;"any chalk in this Poolroom"; 1 e3,e4;" You score the value of"; 1 e3,e4;" Unfortunately there isnt"; 1 e3,e4;" The background colour"; 1 e3,e4;" For each shot you must"; 1 e3,e4;" A free shot is awarded"; 1 e21,e9;z$(e1 1 e21,e9;"Press 'ENTER' to fix." 1 e21,e6;n(c);" " 1 e21,e6;"Press 'ENTER' to fix." 1 e21,e16;"'ENTER' to fix." 1 e21,e0;"Shots=";n(c);" " 1 e21,e0;"Colour? Blue(key5) Yellow(key6) " 1 e21,e0;"2 Player game selected " 1 e21,e0;"1 Player game selected " 1 e21,e0;" (N returns to choice screen) " 1 e21,e0;" (N returns to choice screen) " 1 e21,e0;" Press any key to continue " 1 e21,e0;" (Press key 1 to 9) " 1 e20,e9;z$(e1 1 e20,e9;"ANY key moves indicator" 1 e20,e2;"miscue due to lack of chalk!" 1 e20,e16;"ENTER to fix." 1 e20,e16;" '6' to decrease"; 1 e20,e0;"Want another game? Press Y or N" 1 e20,e0;"Another game? Press Y or N" 1 e20,e0;" and a bonus score of 50. " 1 e2,e1;" "; 1 e1;e8,-e8: 1 e1;e6,e11: 1 e1;e3,-e8: 1 e1;e24,e24: 1 e1;e24,e22: 1 e1;e24,e19: 1 e1;e24,e17: 1 e1;e24,e15: 1 e1;e22,e24: 1 e1;e22,e15: 1 e1;e20,e24: 1 e1;e20,e15: 1 e1;e18,e24: 1 e1;e18,e15: 1 e1;e15,e24: 1 e1;e15,e22: 1 e1;e15,e19: 1 e1;e15,e17: 1 e1;e15,e15: 1 e1;e13,e0: 1 e1;e12,e6: 1 e1;e12,-e6: 1 e1;e0,-e8: 1 e1;-e9,e9: 1 e1;-e8,-e8: 1 e1;-e6,e11: 1 e1;-e4,-e9: 1 e1;-e12,e0: 1 e1;-e11,e6: 1 e1;-e11,-e6: 1 e1;" PLEASE STOP TAPE ": 1 e19,e9;" 1 e19,e6;"Using keys 5,6,7 and 8"; 1 e19,e2;"Press any key to START game." 1 e19,e16;"clockwise." 1 e19,e16;" '7' to increase"; 1 e19,e0;"YOU BEAT THE HIGH SCORE!": 1 e19,e0;"Shots 45 40 35 30 25 20 15 10 5" 1 e19,e0;" You lose 1 shot" 1 e19,e0;" You get bonus of ";sk1;" shots. " 1 e18,e9;"Player ";c;" Wins!" 1 e18,e6;"YOU POTTED THE CUE BALL!" 1 e18,e6;"STRENGTH - Press"; 1 e18,e6;"DIRECTION move indicator "; 1 e18,e2;"Referee awards a free shot, "; 1 e18,e0;"Level 1 2 3 4 5 6 7 8 9" 1 e18,e0;" Referee awards a free shot. " 1 e18,e0;" You scored : ";score 1 e17,e9;"SELECT"; 1 e17,e6;"Position Cue Ball"; 1 e17,e6;"FOUL! You potted black!" 1 e17,e16;"Press ANY key to"; 1 e17,e0;"^" 1 e17,e0;" You potted the black too soon! " 1 e17,e0;" You have run out of shots! " 1 e17,e0;" "; 1 e17,e0;" You cleared the table! " 1 e17,e0;" Choose SKILL LEVEL 1 to 9 " 1 e17)=" SPECTRUM POOL " 1 e15,e30;r(e6) 1 e15,e2;r(e4); 1 e15,e16;r(e5); 1 e14,e4;"will be given the choice." 1 e14,e4;"the border to Magenta!" 1 e14,e4;"black too soon!" 1 e14,e1;" "; 1 e13,e4;"shown. Fouls shots change"; 1 e13,e4;"same shot (unlikely!) he"; 1 e13,e4;"out of shots, or pot the"; 1 e13,e4;"free shot." 1 e13,e4;"changed after each pot." 1 e13,e4;"by the 1st ball potted." 1 e12,e4;"to simplify your choice." 1 e12,e4;"is to play is determined"; 1 e12,e4;"chalk you will be given a"; 1 e12,e4;"a Yellow and Blue in the"; 1 e12,e4;"1 to 6(at random) and are"; 1 e12,e4;" The number of shots are"; 1 e12,e4;" Game ends when you run"; 1 e11,e4;"pot the white ball."; 1 e11,e4;"is used for each option"; 1 e11,e4;"Should a player pot both"; 1 e11,e4;" The pockets are numbered"; 1 e11,e4;" (unless as last ball!)" 1 e11,e4;" The colour each player"; 1 e11,e4;" If is because of lack of"; 1 e11)="00000000000" 1 e10,e4;"a lack of skill!" 1 e10,e4;"a different graphic aid"; 1 e10,e4;"Blue) and the Black." 1 e10,e4;"Black." 1 e10,e4;"(except Black!)." 1 e10,e4;" Hitting the black first"; 1 e10,e4;" You lose a shot if you" 1 e1,e30;r(e3) 1 e1,e2;r(e1); 1 e1,e16;r(e2); 1 d=(d-e1)*16 1 col=c(e2): 1 clear table 2 1 clear table 1 1 c$(e1)=e$: 1 b$(e3,e17) 1 b$(e3)="Max " 1 b$(e2)=" PLAYER 2 " 1 b$(e1)=" PLAYER 1 " 1 SPECTRUM POOL 1 SKILL LEVEL 1 Reset Cue Ball 1 REPEAT LOOP 1 Position cueball 1 POT CUE BALL 1 INSTS. 1 PLAYER 1 INITIALISE CONSTANTS 1 INITIAL SET UP ETC 1 INITIAL SET UP BALLS 1 HI-SCORE POOL 1 Fix Direction 1 END OF GAME -NEW? 1 DIRECTON Sub-routines 1 CHOOSE GAME 1 BX"X#X/X0X1X=X>X^X 1 A$=" " 1 ;" ": 1 8020000000000022"""""""""""22 1 00000111111111122222222222222200000000000000000222222222222222000000((((((((((((************((((((((((((((((((((**((((****(((((((((((11111111111**((((**(((((((((((((1111111111(**((((**((((((((((((((((((((((((**((((**(((((((((((((1111111111111111(**(((((((((((((11111111111(((((((((((((((((((((((((((((((((((((((((((((((((((( 1 00000000000000000000000000000000000000000000000000003300000000000000000000000000033033000000000000333000000000300330330000000000000000000003303003303300000000000000000033033030033033000000000000000330330330330000000088000000003303303303300000000000880000000033033033000000000022000800000000330330000000022222" 0000000003300000002222"""'''''''"A 1 - P.G.Curtis 1 ,e6;" SPIN"; 1 );" memory" 1 (x(e1)/256 1 (r(e6)=r(e5)) 1 (r(e6)=r(e4)) 1 (r(e6)=r(e3)) 1 (r(e6)=r(e2)) 1 (r(e6)=r(e1)) 1 (r(e5)=r(e4)) 1 (r(e5)=r(e3)) 1 (r(e5)=r(e2)) 1 (r(e5)=r(e1)) 1 (r(e4)=r(e3)) 1 (r(e4)=r(e2)) 1 (r(e4)=r(e1)) 1 (r(e3)=r(e2)) 1 (r(e3)=r(e1)) 1 (e9,e9)=a5 1 (e9,e8)=a5 1 (e9,e10)=a5 1 (e8,e9)=a5 1 (e8,e8)=a5 1 (e8,e10)=a5 1 (e7,e9)=a5 1 (e7,e8)=a5 1 (e7,e10)=a5 1 "Shots=";shots;" Score=";score;" "; 1 "000000000001" 1 "000000000000" 1 CRL Group PLC "